www.gusucode.com > 酷维企业网站CMS管理系统 v2.1.0 > 酷维企业网站CMS管理系统 v2.1.0\code\NewsAdmin\newsupp.asp
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="conn.asp" -->
<!--#include file="pass.asp" -->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
<style type="text/css">
<!--
body,td,th {
font-size: 12px;
color: #000000;
}
a {
font-size: 12px;
color: #FF0000;
}
a:visited {
color: #000000;
text-decoration: none;
}
a:hover {
color: #0000FF;
text-decoration: underline;
}
a:link {
text-decoration: none;
color: #000000;
}
a:active {
text-decoration: none;
}
-->
</style></head>
<body>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="24" align="center">
<!--#include file="boom.asp" -->
</td>
</tr>
</table>
<table width="100%" border="0" cellpadding="0" cellspacing="1" bordercolor="#ECE9D8" bgcolor="#5C85D6">
<tr>
<td height="30" colspan="6" align="center" background="images/admin_bg_1.gif"><b><font color="#FFFFFF">文章管理</font></b></td>
</tr>
<%
lei=request("lei")
if lei="" then
sql="select * from news order by id desc"
else
sql="select * from news where mytype="&lei&" order by id desc"
end if
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1
rs.pagesize=200 '每页显示多少条
pagecount=rs.pagecount '总页数
%> <%
if rs.bof and rs.eof then
response.write "没有文章"
else
%>
<tr align="center" bgcolor="#FFFFFF">
<td width="7%" height="22"><strong>ID</strong></td>
<td width="53%"><strong>文章标题</strong></td>
<td width="18%"><strong>添加日期</strong></td>
<td width="10%"><strong>点击数</strong></td>
<td width="6%"></td>
<td width="6%"></td>
</tr>
<%
page=clng(request.querystring("page"))
if page<1 then page=1
if page>rs.pagecount then page=rs.pagecount
rs.absolutepage=page '跳到多少页
for i=1 to rs.pagesize
%>
<tr>
<td height="22" align="center" bgcolor="#FFFFFF"><%= rs("id") %></td>
<td bgcolor="#FFFFFF"> <a href="newsgai.asp?id=<%= rs("id") %>"><%= rs("bt") %></a></td>
<td align="center" bgcolor="#FFFFFF"><%= rs("riqi") %></td>
<td align="center" bgcolor="#FFFFFF"><%= rs("lls") %></td>
<td align="center" bgcolor="#FFFFFF"><a href="newsgai.asp?id=<%= rs("id") %>">修改</a></td>
<td align="center" bgcolor="#FFFFFF"><a href="#" onclick="if(confirm('记录删除以后将不能恢复，您确认吗？')){location.href='news.asp?del=<%=rs("id")%>'};"><font color="#FF0000">删除</font></a></td>
</tr>
<%
rs.movenext
if rs.eof then exit for
next
end if
%>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="27" align="center">
<%for i=1 to pagesize%>
<a href="xx.asp?page=<%=i%>"></a><%=i%></a>
<%next%> </td></tr>
</table>
<table width="556" border="0" cellspacing="0" cellpadding="0">
<form name="ff1" method="post" action="addClick.asp">
<tr>
<td>
点击率增加数：<input name="click" size="8" />
<input type="submit" value="提交" style="font-size:9pt;padding-top:2px;">
</td>
</tr>
</form>
</table><!--#include file="boom.asp" -->
</body>
</html>